home *** CD-ROM | disk | FTP | other *** search
- P286 ; Uses 286 instructions
- jumps ; Let TASM handle out-of-range jumps
-
- Extrn Fadeout: FAR
- Extrn Fadein : FAR
-
- _Code segment para public 'Code'
- assume cs:_Code, ds:_Code, es:_Code, ss:_Stack
-
- ProgStart:
-
- Call Fadeout
- xor ax,ax
- int 16h
- Call FadeIn
-
- mov ax,4c00h
- int 21h
-
- _Code ends
- _Stack segment para stack 'stack'
- db 32 dup (?)
- _Stack ends
-
- End ProgStart
-
-
-
-
-